home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Tools & Apps / Graphics & Imaging / Printer Drivers / STD File Saver 1.1 / MyPrintDriver.p < prev    next >
Encoding:
Text File  |  1990-06-03  |  1.1 KB  |  57 lines  |  [TEXT/MPS ]
  1. UNIT MyPrintDriver;
  2.  
  3. INTERFACE
  4.  
  5. USES
  6.     MemTypes, QuickDraw, OSIntf, ToolIntf, PackIntf;
  7.  
  8. {$D+}
  9. {$R-}
  10. {$OV-}
  11.  
  12. FUNCTION DRVROpen        (ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  13. FUNCTION DRVRControl    (ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  14. FUNCTION DRVRStatus     (ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  15. FUNCTION DRVRPrime        (ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  16. FUNCTION DRVRClose        (ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  17.             
  18.  
  19. IMPLEMENTATION
  20.  
  21. { all functions just say that everything is fine and nothing else }
  22. { see also MyPrintDriver.a for an alternate version of the driver }
  23.  
  24. { a printer driver related to a physical device would of course }
  25. { be more complete than that }
  26.  
  27. FUNCTION DRVROpen(ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  28. BEGIN
  29.     DRVROpen := NOErr;
  30. END;
  31.  
  32.  
  33. FUNCTION DRVRClose(ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  34. BEGIN
  35.     DRVRClose := NOErr;
  36. END;
  37.  
  38.  
  39. FUNCTION DRVRControl(ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  40.     
  41. BEGIN
  42.     DRVRControl := NoErr;
  43. END;
  44.  
  45.  
  46. FUNCTION DRVRPrime(ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  47. BEGIN
  48.     DRVRPrime := NoErr;
  49. END;
  50.  
  51. FUNCTION DRVRStatus(ctlPB: ParmBlkPtr; dCtl: DCtlPtr): OSErr;
  52. BEGIN
  53.     DRVRStatus := NoErr;
  54. END;
  55.  
  56. END.
  57.